
(random-zero-right 0.1)

(random-left-right 1 1.1)

(random-integer-left-right 7 11)

(random-list-element-proportional '(a b c) '(4 2 1))

(random-branch
 (display 'a) 
 (display 'b))				; => DISPLAYS a OR b
